ATV2B Enhancement Sheet 


i 

Mastermind (ARC 2-53) revision by RMH 


Change L 1 nes 


15 0(1 ) = RND ( 10 ) + 47 
30 @ ( Z ) =RND ( 10 ) + 47 
115 IF A=32G0T0 S00 

265 PRINT ; P R I NT " PRESS 'GO' TO PLAY AGAIN 
Add L 1 nes 


9 CLEAR ; GOTO 284 


284 

PRINT 

; PRINT " 

PRESS 

286 

PRINT 

; PRINT " 

PRESS 

.288 

PRINT 

; PRINT " 


290 

A = KP ; 

IF A=48GOTO 

600 

292 

IF A = 

13G0T0 10 



■GO' TO START 
'0' FOR 

INSTRUCTIONS 


294 GOTO 290 

600 CLEAR; PRINT " INPUT 5 DIGITS WITH 

610 PRINT " EACH DIGIT FOLLOWED 
620 PRINT " BY A 'GO'. AFTER YOUR 
630 PRINT " GUESS YOU WILL BE SCORED 
640 PRINT " AS FOLLOWS: 

650 BOX -74,0,6,6, 1 

660 CY=0;CX=-59 ; PRINT "DIGIT IN RIGHT 
POSITION 

670 BOX -74,-8 ,6,6, 1 ; BOX -74, -8, 4, 4, 2 
680 C Y =0 ;CX = -59 ;PRI NT "DIGIT PRESENT 
690 PRINT " PRESS ’SPACE' TO HAVE 
700 PRINT " COMPUTER SHOW YOU NUMBER 
710 PRINT " PRESS ’GO’ TO START 
720 A=KP ; IF A=13GOTO 10 
730 GOTO 720 


J 


I 


SUBSEARCH INSTRUCTIONS (ARCADIAN 2-83) 

You must find the location of s subma r 1 ne 
on the 10x10 grid. If you guess the location 
within plus or minus one square, you acquire 
sonar contact. At this time you have located 
the submarine within a 5x5 grid and now must 
fire a mlssle to the correct coordinates and 
also the correct depth. The depth is either 
1,2, or 3. Results of the previous missile 
attack are used to tell you where the sub 
Is located. Happy Huntlngll 

SUBSEARCH REVISED BY R. M. Houser 

Change the following lines to: 

110 CLEAR ; BOX 0,3,140,62,1 

120 BOX -77+Xxl4,-30+Yx6,6,2,3;PRlNT“ENTER 

XY COORDINATES 1-10” 


130 CY=-35; INPUT X ; C Y= - 35 ; CX=0 ; I NP UT Y 
140 FOR A=0TO X ; BOX - 77+Ax 1 4 , -30 , 2 , 2 , 3 ; 

M U = " 5 " ; B 0 X -77+Axl4,-30,2,2,3;NEXT A 
150 FOR A = 0T 0 Y ; BOX -77 + Xx 1 4 , -30+6xA , 2 , 2 , 3 ; 
MU="5" ;BOX -77 + Xxl4,-30+Ax6,2,2,3;NEXT A 
155 IF X>U-2 IF X< U + 2 IF Y>V-2 IF Y<V + 2 
GOTO 400 

510 U=3;K=3;L=0;D=RND(4> 

520 PRINT "FROM” ,#2,K,#2, J ,#2,L 
540 IF U < Y P R I NT "NORTH”, 

550 IF 0>YPRINT "SOUTH", 

Add the following lines. 

615 PRINT "ENTER TARGET DATA” 

616 INPUT " X-AX I S ” K 

618 INPUT " Y - AX I S ” J 

619 INPUT " D £ P T H ” L 
Del ete line 620 

630 Q= RN D ( 50 ) ; I F 0=25 GOTO 660 


I 


I 



